Libris Britannia 4/science library(b).zip/science library(b)/INFO/XFDISK.ZIP/CP3204.2R

Text File | 1991-08-28 | 6KB | 171 lines

F 0100 07FF 0
A 100
MOV AX,CS   ; get CS register
MOV DS,AX   ; initialize DS register
MOV ES,AX   ; initialize DS register
;
MOV AH,30   ; get function code to check DOS version
INT 21      ; call DOS routine to get version number
CMP AL,5    ; check for DOS version 5.00 or higher
JGE 112     ; JGE CONTINUE to partition fixed disk
;             otherwise, incorrect DOS version
MOV AL,80   ; set ERRORLEVEL value to indicate incorrect DOS version
JMP 130     ; JMP ERROR
;
;[CONTINUE]
MOV SI,0003 ; initalize loop counter
;
;[LOOP]
MOV AH,03   ; get function code to write to disk
MOV AL,02   ; get number of sectors to write
MOV BX,0200 ; ES:BX points to beginning of data
MOV CX,0001 ; set CH to low order byte for cylinder number
;             set CL lower 6-bits to sector number
;             set CL upper 2-bits to high order bits for cylinder number
MOV DH,00   ; get number for head (side)
MOV DL,81   ; get drive number for 2nd fixed disk
INT 13      ; call BIOS routine which provides disk services
JNC 0134    ; JNC WRITEOK if no error
;             otherwise, . . .
MOV AH,0    ; get function code to reset disk system
INT 13      ; call BIOS routine which provides disk services
DEC SI      ; decrement loop counter
JNZ 0115    ; JNZ LOOP to try to write to disk again
;             otherwise, . . .
MOV AL,02   ; set ERRORLEVEL value to indicate error
;           ; and . . .
;[ERROR]      terminate program with ERRORLEVEL value
MOV AH,4C   ; get function code to teminate program
INT 21      ; and exit program
;
;[WRITEOK]
MOV AL,00   ; set ERRORLEVEL value to indicate success
MOV AH,4C   ; get function code to teminate program
INT 21      ; and exit program
NOP

F 2E1 3FD 0
E 3FE 55 AA
A 400
JMP 43E
NOP

E 403 "DWPerson"
E 40B 00 02
E 40D 02
E 40E 01 00
E 410 02
E 411 00 02
E 413 00 00
E 415 F8
E 416 CB 00
E 418 33 00
E 41A 0F 00
E 41C 01 00 00 00
E 420 67 96 01 00
E 424 81
E 425 00
E 426 29
E 427 31 08 91 19
E 42B "FDISK"
E 430 "2"
E 431 " VOL"
E 435 "?"
E 436 "FAT16   "
E 5FE 55 AA
E 600 F8 FF FF FF
E 3BE 00
E 3BF 00
E 3C0 02
E 3C1 00
E 3C2 05
E 3C3 0E
E 3C4 B3
E 3C5 1F
E 3C6 01 00 00 00
E 3CA 9F 59 06 00
E 5BE 00
E 5BF 00
E 5C0 02
E 5C1 00
E 5C2 06
E 5C3 0E
E 5C4 33
E 5C5 87
E 5C6 01 00 00 00
E 5CA 67 96 01 00
E 5CE 00
E 5CF 00
E 5D0 01
E 5D1 88
E 5D2 05
E 5D3 0E
E 5D4 73
E 5D5 0F
E 5D6 68 96 01 00
E 5DA 68 96 01 00
E 435 "1"
 G=100 138
F 5BE 5FD 0
E 3BE 00
E 3BF 00
E 3C0 02
E 3C1 88
E 3C2 06
E 3C3 0E
E 3C4 73
E 3C5 0F
E 3C6 01 00 00 00
E 3CA 67 96 01 00
E 3CE 00
E 3CF 00
E 3D0 41
E 3D1 10
E 3D2 05
E 3D3 0E
E 3D4 73
E 3D5 97
E 3D6 D0 2C 03 00
E 3DA 68 96 01 00
E 11D 01 88
E 435 "2"
 G=100 138
E 3BE 00
E 3BF 00
E 3C0 42
E 3C1 10
E 3C2 06
E 3C3 0E
E 3C4 73
E 3C5 97
E 3C6 01 00 00 00
E 3CA 67 96 01 00
E 3CE 00
E 3CF 00
E 3D0 41
E 3D1 98
E 3D2 05
E 3D3 0E
E 3D4 B3
E 3D5 1F
E 3D6 38 C3 04 00
E 3DA 68 96 01 00
E 11D 41 10
E 435 "3"
 G=100 138
E 3BE 00
E 3BF 00
E 3C0 42
E 3C1 98
E 3C2 06
E 3C3 0E
E 3C4 B3
E 3C5 1F
E 3C6 01 00 00 00
E 3CA 67 96 01 00
F 3CE 3DD 0
E 11D 41 98
E 435 "4"
 G=100
Q